COMMENT ⊗   VALID 00005 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	
C00003 00003	(OUTC (OUTPUT T (IL LSP) (ILLSP . LOG)) NIL)
C00010 00004	(OUTC (OUTPUT T (IL LSP) (ILLSP . LG)) NIL)
C00012 00005	(HGHORG BPORG)
C00014 ENDMK
C⊗;

.LOAD IL
Swapping to SYS:LOADER.DMP
LOADING

LOADER 8+13 PAGES

Exit
↑C
.c 24

.s


ALLOC? (Y OR N) Y
EXTRA FULL WORD SP. = 2000 
EXTRA BIN. PROG. SP. = 400



(HGHCOR 17400)

T 
(SETQ BORG1 BPORG)

1305 
(SETQ BEND1 BPEND)

1704 
(SETQ BPORG (HGHORG NIL))

414762 
(SETQ BPEND (HGHEND))

435777 
(OUTC (OUTPUT T (IL LSP) (ILLSP . LOG)) NIL)
(INC (INPUT TT LAP (SYS1 . LAP) (EDIT . LAP) (ERRORX . LAP)) NIL)

NIL 

NIL 

NIL 

10 

10 

10 

SPECIAL 

LAPLST 

REMOB 

LAP 

TYPE 

GWD 

≥APEVAL 

DEFSYM 

GVAL 

OPS 

T 

NIL 

NIL 

REMLAP 

(GWD 415034) 

(LAP 415177) 

(LAPEVAL 415513) 

(DEFSYM 415557) 

(GVAL 415607) 

(TYPE 415615) 

NIL 

(OPS 415635) 

10 

10 

SELECTQ1 

SUBPR 

MEMCDR 

(DIR 415670) 

(*RENAME 415672) 

(FILBAK 415736) 

FILBAK 

(%DEFINE 415772) 

(DE 416001) 

(DF 416010) 

(DM 416017) 

(%DEREAD 416037) 

(DRM 416050) 

(DSM 416061) 

(%DEVP 416077) 

(%READIN 416131) 

(DSKIN 416144) 

(PUTSYM 416176) 

(GETSYM 416250) 

(DSKOUT 416351) 

LPTLENGTH 

(GRINL 416436) 

(TCONC 416502) 

(LCONC 416561) 

(DREVERSE 416603) 

(REMOVE 416633) 

(DREMOVE 416704) 

(TAILP 416724) 

(ASSOC# 416745) 

(PRINTLEV 416756) 

(PRINLEV 417114) 

(MEMCDR 417134) 

%PREVFN% 

%LOOKDPTH 

$%DOTFLG 

(LSUBST 417210) 

(SELECTQ 417221) 

SELECTQ 

(SELECTQ1 417256) 

(SUBLIS 417270) 

(SUBPAIR 417311) 

(SUBPR 417416) 

(DSUBST 417501) 

(RETFROM 417523) 

(LDIFF 417561) 

(NTH 417614) 

OLDSUBST 

(RPUTSYM 417646) 

(RGETSYM 417720) 

(GRINDEF 420125) 

GRINPROPS 

(FILBAK 420170) 

FILBAK 

EDITREAD 

EDITCOM 

EDITCOMA 

EDITCOML 

EDITMAC 

EDITCOMS 

EDITH 

EDIT!UNDO 

UNDOEDITCOM 

EDITSMASH 

EDITNCONC 

EDIT1F 

EDIT2F 

EDITBF1 

EDITNTH 

BPNT0 

BPNT 

EDITDEFAULT 

EDUP 

EDIT* 

EDOR 

ERRCOM 

EDRPT 

EDLOC 

EDLOCL 

EDITELT 

EDITCONT 

EDITSW 

EDITTO 

EDITBELOW 

EDITRAN 

(## 420203) 

(EDITFNS 420233) 

(EDITF 420330) 

(EDITV 420416) 

(EDITP 420461) 

(EDITE 420511) 

(EDITL 420547) 

(EDITL0 420662) 

(EDIT1 420677) 

(SUBFUN1EDVAL 420701) 

(EDVAL 420706) 

(SUBFUN1EDITL1 420711) 

(EDITL1 420777) 

(EDITREAD 421027) 

(EDITCOM 421112) 

(EDITCOMA 421716) 

(EDITCOML 423057) 

(EDITMAC 423116) 

(EDITCOMS 423134) 

(EDITH 423176) 

(EDIT!UNDO 423271) 

(UNDOEDITCOM 423422) 

(EDITSMASH 423451) 

(EDITNCONC 423475) 

(EDITDSUBST 423560) 

(EDIT1F 423663) 

(EDIT2F 424103) 

(EDIT4E 424270) 

(EDITQF 424330) 

(EDIT4F 424530) 

(EDITFPAT 424574) 

(EDIT4F1 425020) 

(EDITFINDP 425047) 

(EDITBF 425152) 

(EDITBF1 425352) 

(EDITNTH 425444) 

(BPNT0 425500) 

(BPNT 425551) 

(RI 425620) 

(RO 425652) 

(LI 425672) 

(LO 425720) 

(BI 425771) 

(BO 426020) 

(EDITDEFAULT 426152) 

(EDUP 426251) 

(EDIT* 426311) 

(SUBFUN1EDOR 426330) 

(EDOR 426350) 

(SUBFUN1ERRCOM 426352) 

(ERRCOM 426357) 

(EDRPT 426421) 

(EDLOC 426507) 

(EDLOCL 426535) 

(EDIT: 426736) 

(EDITMBD 427025) 

(EDITXTR 427132) 

(EDITELT 427150) 

(SUBFUN1EDITCONT 427152) 

(EDITCONT 427235) 

(EDITSW 427264) 

(EDITMV 427410) 

(EDITTO 427474) 

(EDITBELOW 427557) 

(EDITRAN 427734) 

ERFNS 

EVALP 

BKTRACE 

BKFIND 

BKTR 

BKTRV 

BKPRINVAL 

BKACT 

CHNMX 

CHNM1 

BKREAD 

ARGLIST 

GOFN 

(ERRORX 430050) 

(BKREAD 430071) 

(SUBFUN1//BREAK1 430074) 

(SUBFUN2//BREAK1 430076) 

(//BREAK1 431017) 

//BREAK1 

(SUBFUN1%BKEVAL 431022) 

(SUBFUN2%BKEVAL 431026) 

(SUBFUN3%BKEVAL 431035) 

(SUBFUN4%BKEVAL 431043) 

(%BKEVAL 431126) 

(BREAK1ERX 431140) 

(EVALP 431154) 

(GOFN 431172) 

(%ERDEPTH 431174) 

20 

(PLEV 431176) 

(FROM?= 431217) 

(USE 431320) 

(?= 431372) 

(& 431466) 

(EDBRK 431573) 

(SUBFUN1*RSETERX 431576) 

(SUBFUN2*RSETERX 431602) 

(*RSETERX 431646) 

(BKTRACE 432030) 

(FNDBRKPT 432075) 

(BKFIND 432124) 

(BKTR 432147) 

(BKTRV 432262) 

(BKPRINVAL 432331) 

(BKACT 432360) 

(CHNMX 432407) 

(CHNM1 432422) 

(BKPOS 432457) 

(ARGLIST 432517) 

(LXPD 432544) 

(PREVEV 432567) 

(STKNAME 432607) 

(STKNTH 432656) 

(STKSRCH 432721) 

(STKCOUNT 432762) 

(SUBFUN1ARGPRINT 433011) 

(ARGPRINT 433027) 

FREE STG EXHAUSTED
4213 FREE STG,1307 FULL WORDS AVAILABLE

(INC NIL T)

NIL 
(OUTC (OUTPUT T (IL LSP) (ILLSP . LG)) NIL)
(INC (INPUT TT (SYS2 . LSP) (EDIT . LSP) (ERRORX . LSP) (BREAK . LSP)) NIL)

LAST INPUT: File: . Page  Line 
   (INITFN (QUOTE (LAMBDA NIL (TERPRI(PRINC(TERPRI TOPMES)))))))↔


↔ 
UNBOUND VARIABLE - EVALSYS2LSP244
(OUTC (OUTPUT T (IL LSP) (ILLSP . LG)) NIL)
(INC (INPUT TT (SYS2 . LSP) (EDIT . LSP) (ERRORX . LSP) (BREAK . LSP)) NIL)

NIL 

NIL 

NIL 

PLUS 

DIFFERENCE 

TIMES 

QUOTIENT 

LESSP 

GREATERP 

MIN 

MAX 

(IF REDEFINED) 

EDITMACROS 

USERMACROS 

EDITOPS 

EDITRACEFN 

LASTWORD 

MAXLEVEL 

UPFINDFLG 

MAXLOOP 

EDITCOMSL 

-171520 

-172340 

BREAK1 

BREAKMACROS 

%PRINFN 

ERRORX 

NIL 

NIL 

BROKENFNS 

TRACEDFNS 

BKFNLIST 

UNBREAKABLEFNS 

(OUTC NIL T)

NIL 
(HGHORG BPORG)

414762 
(SETQ BPORG BORG1)

1305 
(SETQ BPEND BEND1)

1704 
(HGHCOR NIL)

T 
(EVAL (CONS (QUOTE REMOB REMOB))
}
NIL 
(EVAL (CONS (QUOTE REMOB) REMOB))

NIL 
(SETQ REMOB NIL)

NIL 
(REMOB SYS1 SYS1FNS SYS2)

NIL 
(SETQ INITMES (QUOTE "Latest version: 31 January 1975;  Mail questions to RWW."))

"Latest version: 31 January 1975;  Mail questions to RWW." 
(SETQ TOPMES (QUOTE "⊗IL⊗"))

"⊗IL⊗" 
(PROG NIL (INITFN (QUOTE IF)) (INITFL (INIT . LSP)) (INITPROMPT 52)
	  (GCGAG NIL) (NOUUO T) (*RSET T)
	  (SETSYM SYM) (SETLOD LOD) (SETSYS IL) (SYSCLR)
	  (INC NIL T) (OUTC NIL T) (EXIT) )

SETSYM 
UNDEFINED FUNCTION
LAST INPUT: 	  (INC NIL T) (OUTC NIL T) (EXIT) )

(SETSYM BROKEN)
1:***** WARNING: AUTOMATIC LOGOUT IN FIVE MINUTES! *****
↑C
↑C

.CON

(CDR @SETSYM)
(PNAME (#24776 #24774))

1:(CDR @UUOTRX)
(PNAME (#24771 #24770))

1:↑C
↑C
↑C

.CON

(CDR @CDR)
(SUBR -173503 PNAME -165030)

1:↑C
↑C

.R PPSAV